%these scripts were written to test the difference between
%WMM with a geoid and without a geoid
%



load c:\manoj\temp\WMM_Gird_with_Geoid.txt
X_Geoid = (reshape(WMM_Gird_with_Geoid(:,5),[360,180]));
imagesc(X_Geoid)
colorbar
load c:\manoj\temp\WMM_Gird_without_Geoid.txt
X_NoGeoid = (reshape(WMM_Gird_without_Geoid(:,5),[360,180]));
imagesc(X_NoGeoid-X_Geoid)
colorbar
Z_Geoid = (reshape(WMM_Gird_with_Geoid(:,7),[360,180]));
Z_NoGeoid = (reshape(WMM_Gird_without_Geoid(:,7),[360,180]));
imagesc(Z_NoGeoid-Z_Geoid)
colorbar
Y_NoGeoid = (reshape(WMM_Gird_without_Geoid(:,6),[360,180]));
Y_Geoid = (reshape(WMM_Gird_with_Geoid(:,6),[360,180]));
imagesc(Y_NoGeoid-Y_Geoid)
Decl_Geoid = (reshape(WMM_Gird_with_Geoid(:,8),[360,180]));
Decl_NoGeoid = (reshape(WMM_Gird_without_Geoid(:,8),[360,180]));
imagesc(Decl_NoGeoid-Decl_Geoid)
imagesc(Decl_NoGeoid)